10 PRINT"[147]DRUCKTEST:":PRINT"MIT DER ROUTINE, DIE NACH TASTENDRUCK   STARTET, WIRD"
20 PRINT"A) DER BILDSCHIRM MIT DEN MOEGLICHEN 255   'POKE-ZEICHEN' BESCHRIEBEN UND"
30 PRINT"B) ANSCHLIESSEND DER BILDSCHIRM-INHALT     GEDRUCKT."
40 PRINT"VOR PROGRAMMSTART ALSO UNBEDINGT              DRUCKER EINSCHALTEN ! [146]"
50 POKE198,0:WAIT198,1:POKE198,0
60 PRINT"[147]":FORT=1024TO1664STEP320
70 FORU=0TO255
80 POKET+U,U
90 NEXTU
100 NEXTT
110 PRINT"          DIES IST EIN TEST ! [146]";
120 GOSUB150
130 PRINT"[147]":LIST150-
140 REM  OPEN4,4:FORJ=1024TO2023STEP40
150 OPEN4,4:FORJ=1024TO1344STEP40
160 FORK=0TO39:A=PEEK(J+K)
180 IFA<32THENA=A+64:GOTO280
190 IFA>32THENIFA<64THEN280
200 IFA>63THENIFA<96THENA=A+32:GOTO280
210 IFA>95THENIFA<128THENA=A+64:GOTO280
220 IFA>127THENIFA<160THENA=A-64:GOTO300
230 IFA>159THENIFA<192THENA=A-128:GOTO290
240 REM IFA>191THENIFA<224THENA=A-96:GOTO300
250 IFA>191THENIFA<255THEN300
260 REM IFA>223THENA=A-64:GOTO300
270 IFA=255THENA=A-64:GOTO300
280 A$=CHR$(A):GOTO310
290 IFA=34THENA=32
300 A$=CHR$(18)+CHR$(A)+CHR$(146)
310 B$=B$+A$
320 NEXTK
330 PRINT#4,B$:B$=""
350 NEXTJ
360 PRINT#4:CLOSE4:RETURN